Voorbeeld van de instructie Set

Dit voorbeeld maakt gebruik van de instructie Set om objectverwijzingen aan variabelen toe te wijzen. Er wordt vanuit gegaan dat YourObject een geldig object is met de eigenschap Text.

Dim YourObject, MyObject, MyStr
Set MyObject = YourObject    ' Wijst objectverwijzing toe.
' MyObject and YourObject refer to the same object.
YourObject.Text = "Hallo allemaal"    ' Initialize property.
MyStr = MyObject.Text    ' Returns "Hallo allemaal".

' Stop associatie. MyObject no longer refers to YourObject.
Set MyObject = Nothing    ' Release the object.